home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Tools / MPW / sed 2.0.3 / alloca.h < prev    next >
Encoding:
Text File  |  1993-04-16  |  573 b   |  22 lines  |  [TEXT/MPS ]
  1. /*
  2.  *    alloca.h
  3.  *
  4.  *    For use with MPW C
  5.  *
  6.  *    Based on "alloca.a" found in an old port of GNU e?grep
  7.  *    Franklin Chen
  8.  *    Fri, Apr 16, 1993
  9.  */
  10.  
  11. void *alloca (unsigned int size) =
  12.   {
  13.     0x201F, /*    move.l    (sp)+,d0    ; pop parameter = size in bytes */
  14.     0x5680, /*    addq.l    #3,d0        ; round size up to long word */
  15.     0x0280,
  16.     0xFFFF,
  17.     0xFFFC, /*    andi.l    #-4,d0        ; mask out lower two bits of size */
  18.     0x9FC0, /*    suba.l    d0,sp        ; allocate by moving stack pointer */
  19.     0x200F, /*    move.l    sp,d0        ; return pointer */
  20.     0x598F  /*    subq.l    #4,sp        ; new top of stack */
  21.   };
  22.